{	Problem: http://codeforces.ru/problemset/problem/79/A
	Verdict: Accepted
}
uses
    SysUtils, Math;

var
    n,m,t,k:longint;
    f:boolean;

begin
read(n,m);
f:=true;
while true do begin     
    if f then begin
        k:=22;
        t:=min(n,2);
        dec(k,t*10);
        dec(n,t);
        if m>=k then begin
            dec(m,k);
            f:=false;
        end else break;
    end else begin
        if m>=22 then begin
            dec(m,22);
            f:=true;
        end else
        if (m>=12) and (n>=1) then begin
            dec(n);
            dec(m,12);
            f:=true;
        end else 
        if (m>=2) and (n>=2) then begin
            dec(n,2);
            dec(m,2);
            f:=true;
        end else break;
    end;                
end;
if f then write('Hanako') else write('Ciel');
end.